home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 7 (Internal Edition) / Apple R&P Lib Internal v7.0.iso / 5-Fonts & Software / Macintosh Yellow Pages 2.0 / Macintosh Yellow Pages 2.0 / background_19510.txt < prev    next >
Text File  |  1991-03-12  |  2KB  |  103 lines
  1. -- background: 19510 from stack: in.0
  2. -- bmap block id: 19868
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: Index
  6. ----- HyperTalk script -----
  7. on openBackground
  8. end openBackground
  9.  
  10. on closeBackground
  11. end closeBackground
  12.  
  13. --on returnkey
  14. click at the loc of bkgnd button "Cancel"
  15. end returnkey
  16.  
  17. on arrowKey
  18.   -- do nothing
  19. end arrowKey
  20.  
  21. on doMenu action
  22.   if action is "Text Style..." then
  23.     send mouseUp to bkgnd button "Return"
  24.   else
  25.     pass doMenu
  26.   end if
  27. end doMenu
  28.  
  29.  
  30.  
  31. -- part 1 (field)
  32. -- low flags: 01
  33. -- high flags: 0000
  34. -- rect: left=343 top=3 right=20 bottom=510
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 0 / 0
  37. -- text alignment: 65535
  38. -- font id: 20
  39. -- text size: 12
  40. -- style flags: 2304
  41. -- line height: 16
  42. -- part name: Page Number
  43.  
  44.  
  45. -- part 2 (field)
  46. -- low flags: 01
  47. -- high flags: 0000
  48. -- rect: left=2 top=3 right=21 bottom=451
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 0
  52. -- font id: 20
  53. -- text size: 12
  54. -- style flags: 2304
  55. -- line height: 16
  56. -- part name: Header
  57.  
  58.  
  59. -- part 71 (button)
  60. -- low flags: 00
  61. -- high flags: 2000
  62. -- rect: left=217 top=305 right=337 bottom=253
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 0 / 0
  65. -- text alignment: 1
  66. -- font id: 0
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: Return
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.   global undoMemory
  74.   go to undoMemory
  75. end mouseUp
  76.  
  77. on mouseDown
  78.   play stop
  79.   play harpsichord a7e
  80.   global lastVisitTOC
  81.   put the seconds into TOC
  82. end mouseDown
  83.  
  84.  
  85.  
  86. -- part 74 (button)
  87. -- low flags: 00
  88. -- high flags: A004
  89. -- rect: left=30 top=57 right=92 bottom=177
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 0 / 0
  92. -- text alignment: 0
  93. -- font id: 0
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 16
  97. -- part name: + Table of Contents
  98. ----- HyperTalk script -----
  99. on mouseUp
  100.   go to card "TOC:  Root"
  101. end mouseUp
  102.  
  103.